package A is
  procedure Foo;
end A;
